perm filename DRAW.LCS[DRW,LCS] blob sn#493206 filedate 1980-03-27 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	**********  DRAW  ************* 5/74
C00010 ENDMK
CāŠ—;
**********  DRAW  ************* 5/74
	TO GET A .DMP COPY OF THIS PROGRAM LOG IN ON DRW,LCS AND TYPE
'LOA @DRAW'.

THE PROGRAM ALLOWS YOU TO DRAW PICTURES WITH  THE  LIGHT  PEN  OR  BY
ENTERING SPECIFIC X,Y COORDS. AT THE KEYBOARD.

WHEN THE PROGRAM STARTS IT WILL PRINT "H=HELP" AND THEN A "*".

**************  D (DRAW)  *********************

TO  BEGIN  A  DRAWING  TYPE  'D'.  
(******  ALWAYS FOLLOW COMMANDS WITH <CR>. *******)

TO HAVE A BACKGROUND REFERENCE GRID APPEAR TYPE 'D 0 1'.    ANY  TIME
'1'  IS GIVEN AS THE THIRD ITEM AT THIS POINT IN THE PROGRAM THE GRID
WILL APPEAR.  TO DELETE THE GRID TYPE '-1' IN THIS POSITION.

	THE GRID GIVES 2X2 SQUARES.  THE LONGER HORIZANTAL LINES  ARE
REFERENCES  FOR  THE  MUSICAL  STAFF.  POINT 0,0 WILL BE AT THE LOWER
LEFT-CENTER OF THE SCREEN WHERE THE CURSOR FIRST  APPEARS.   THE  1ST
NUMBER  AFTER  'D' IS  A  SIZE FACTOR.  (ZERO WILL GIVE SIZE 9.)  ANY
NON-ZERO NUMBER IN THIS POSITION WILL CHANGE THE SIZE.

WHEN DRAWING, EACH NEW POINT MAY BE SET EITHER BY MOVING  THE  CURSOR
WITH THE LIGHT PEN OR BY TYPING IN THE X AND Y POSITION.  IMMEDIATELY
AFTER A POINT IS SET IT MAY BE SHIFTED UP, DOWN,  LEFT  OR  RIGHT  BY
TYPING U n, D n, L n OR R n. (ONLY ONE OF THIS TYPE OF COMMAND MAY BE
GIVEN AT A TIME - AND ONLY IMMEDIATELY AFTER THE POINT  IS  SET.)  TO
BACK  UP  THROUGH  A  DRAWING TYPE 'B'.  (AFTER TYPING 'B', THE LEFT,
RIGHT, UP, DOWN COMMANDS WILL NOT WORK UNTIL A  NEW  POINT  HAS  BEEN
SET.)

TO EXIT FROM DRAWING MODE TYPE 'X'.
  THE FOLLOWING CAN ONLY BE TYPED AFTER THE "*" APPEARS.
**************  S (SAVE DRAWING)  *********************
**************  G (GET A DRAWING FROM A FILE)  *********************
**************  GM (GET A DRAWING AND ADD TO CURRENT PICTURE)  **********
**************  F (FILL THE DRAWING)  ********************
**************  FS (SMOOTH AND FILL, THE FEATURE NOT FINISHED )  ********
**************  M (MOVE THE DRAWING)  ********************
**************  R (ROTATE THE DRAWING)  ********************
**************  DEL (DELETE A DRAWING FROM A FILE)  ******************  

**************  Q (BACKGROUND)  *********************

TYPE  'Q'  TO  PUT  UP  THE  CURRENT  DISPLAY AS BACKGROUND.  YOU MAY
CONTINUE TO ADD TO THE  DRAWING  OR  EDIT  IT  IN  ANY  WAY  BUT  THE
BACKGROUND  WILL  REMAIN  UNCHANGED.  THIS WORKS JUST LIKE THE 'GRID'
FEATURE ABOVE. USE '-1' AS ABOVE TO MAKE THE BACKGROUND GO AWAY.

**************  Z (ZERO THE DRAWING)  *********************

TYPE 'Z' TO ZERO THE DRAWING IF YOU WISH TO RETAIN THE BACKGROUND
ONLY.  THIS IS USEFUL FOR USING AN OLD DRAWING AS GUIDE FOR POSITIONING
A NEW DRAWING, ETC.

**************  E (EDIT)  *********************

IN DRAW SECTION: THE 3RD NUMB=1=JUMP(INVIS. VECT.)
 THE 3RD NUMB=2=JUMP AND BEGIN FILL SECTION.
SINGLE ITEM IS RESTRICTED TO 350 WDS. 10 ITEMS PER FILE.
 TYPE "REL" FOR RELATIVE VECTORS, "AB" FOR ABSOLUTE
 TYPE 3RD NUM=1 FOR JUMPS
 IF 3RD NUM=2 -- BEGIN FILL SECTION
B=BACKUP, J=JUMP, CR=SET POINT, X=EXIT, LRUD-N
 C=CLOSE THE AREA (GO TO LAST 'JUMP' POINT)
 D=EXTEND DRAWING,  F=START FILLER OUTLINE
 TYPE "A" OR ":" TO ALTER
 TYPE "G"=GROUP CHANGE) TO MAKE RELATIVE CHANGE STICK
   THEN <CR>S. ANY OTHER LETTER TO ESCAPE
 n=STEP AHEAD(n STEPS) (-n GOES BACK)
 IF IN "REL" MODE TYPE "O" BEFORE USING LTPEN
N OR B=BACKUP, J=INSERT OR ALTER TO JUMP, C=ALTER JUMP TO CONT.

   FOR  POINT OK? (Y,N,B,J,F OR C) ',$)
Y=YES,N=NO,B=BACKUP,J=JUMP,F=START FILL,C=CONTINUE(NULLIFY JUMP)


******* TO MOVE SECTIONS OF THE DRAWING WHILE IN EDIT MODE *******

WHEN A(LTER), I(NSERT), ETC. IS REQUESTED TYPE 'M n1 n2' TO MOVE 
POINTS n1 THROUGH n2.  THE NUMBERS OF THE POINTS MAY BE FOUND BY
STEPPING THROUGH WITH <CR>S.  IF n1 IS MADE NEGATIVE, THE SET OF
POINTS WILL BE ESTABLISHED AS A "MOVE ITEM". THE FIRST ONE WILL
BE NUMBER 1, THE SECOND NUMBER 2, ETC.  ONCE ESTABLISHED, THEY
MAY BE REFERRED TO BY NUMBER.  HENCE IF n2 IS ZERO ALL THE POINTS
OF ITEM n1 WILL BE MOVED.

	M -11 25
	(SETS UP MOVE ITEM 1. FOLLOW PROMPT TO MOVE IT.)

	M 1
	(NOW THE POINTS 11-25 CAN BE MOVED AGAIN.)

	M -37 42
	(THIS SETS UP ITEM 2)